home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / color.dxr / 00169.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  428 b   |  13 lines

  1. on mouseUp me
  2.   global warmsunr, warmsung, warmsunb, iconfade
  3.   showit(36, 38)
  4.   set the blend of sprite 47 to 100
  5.   repeat with iconfade = 48 to 54
  6.     set the blend of sprite iconfade to 50
  7.   end repeat
  8.   set the memberNum of sprite 36 to 23
  9.   sprite(40).color = rgb(warmsunr, warmsung, warmsunb)
  10.   sprite(47).color = rgb(warmsunr, warmsung, warmsunb)
  11.   set the locH of sprite 38 to 439 + (warmsung * 0.78400000000000003)
  12. end
  13.